AbstractValue Value [A]; 
For each alias M: 

Value [M] = InitialValue (M) 
Add the node corresponding to M to Q. 
While Q is nonempty, do: 

Let n be an element of Q. Remove n from Q. 
If n corresponds to an alias, add the successors of n in G to Q 
If n corresponds to a statement of the form (PUT A E1), do: 
letV=Eval (E1) 
if not (LE(V, Value [A])) then 

Value [A] = JOIN (Value [A], V) 
Add A to Q 
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